﻿<%
Sub Sitemap(S_KEY)
SysInclude("sitemap.html")
If S_KEY=0 Then 
	Flush()
Else
	FlushToHTML()
End If 

End Sub 
%>


